static oClass

function TBox()

   if oClass == nil
      oClass = TClass():New( "TBox" )

      oClass:AddData( "nTop" )
      oClass:AddData( "nLeft" )
      oClass:AddData( "nBottom" )
      oClass:AddData( "nRight" )
   endif

return oClass:Instantiate()

